home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-13 / amac44c.zip / RING@F1.QM < prev    next >
Text File  |  1992-02-17  |  1KB  |  36 lines
  1. *                               RING@F1.QM
  2. *                    [ See RINGxx.QM for discussion ]
  3. *                                2/17/92
  4.  
  5. * 
  6. * ----------------------------------------------------------------------
  7. * @(f1)  Load Previously Saved List of Files
  8. * ----------------------------------------------------------------------
  9.  
  10. * This macro loads the list of files previously saved with @2.  This is
  11. * a modification to a macro written by Kyle Watkins of SemWare to load
  12. * a list of files and macro @2 above.
  13.  
  14. * If this macro is the first macro in a file named 'ring@f1.qm', the
  15. * following batch file will load from the command line the list of
  16. * files previously saved with @2, with the file you were editing when
  17. * @f2 was invoked, loaded:
  18.  
  19. *                   q.exe  qstat  /Ering@f1.mac
  20.  
  21. @f1 macrobegin
  22.     editfile "qstat" return     * Load file list
  23.     EndFile BegLine             * Start at last line
  24.   REPEAT:                       *
  25.     MarkLine Copy               * Grab this name
  26.     EditFile                    * Get ready to load
  27.     CurrentFilename " "         * To force return *here*
  28.     Paste Return                * Paste file name & do it!
  29.     CursorUp                    * More lines above?
  30.     JTrue REPEAT:               * If yes, repeat.
  31.     killfile quit               * Kill/quit list
  32.     EditFile Paste Return       * Load first file in list
  33. *
  34. * 35 bytes Fri  08-02-1991  11:50:42 (TH @f1)
  35.  
  36.